COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	αβxsubjob↔αβ8αβxbotset↔ start up a subjob and leave 8 lines for it
C00010 ENDMK
C⊗;
αβxsubjob⊗↔αβ8αβxbotset⊗↔⊗; stcwu+
βOWV{	βπv!β3↔∂3∃↓aεc';↔~β≠?IεKP4(⊂→@λ∂FS→↓`18Ymβπ∪↔O↔↔3↔Mβ&MβNqβ+W∨#'≠gNs≥βC∂∪π∨K∂β#L4Ph(
b$*~&:*αbLX91mβO.s⊃β≠Nc∃β;∞k↔⊃β}qβ∂W↔∪↔;Qεc';∃π#=βc?4(_∪∀'G→Nh⊃,18$X>XλX\⊂≠Tc∨++?⊃0\λ
⊂⊃tλ
⊂⊂∂⊂λ→0∧4(hP
b∩,2&:∃ε#?[↔⊃0\Ymπ≠↔;⊃ε3'3∃εsπ7↔"β?9β∨+KK↔w!β3'v)βS=ε#?[↔⊂h(⊗('∪␈3↔I↔~t	⊗XX\I0←,λ18λ∂T↔COWV{λX\⊂→H	t⊂→Hλ∂ ⊂X∧hP4(
D"⊗~&t)xX91mβ↔w#↔Iβε{';S.!β≠'f)β'9π∪↔π∪?∪'S∃εk?∪∀hPcCy0\c⊗+π∪\18λXλh(4(∃B∩⊗~Lr∃↓∀18Ymβ≡+;⊃β∨+KK↔w!β3'v)βS=∧b&N@hPλX\∪hλXλh(4(∃B∩⊗~Lr∃H18Ymβ&/∃βfK;∃β⊗∂-β&yβ≠'f)β?→ε3'3↔_h(⊗@X\(∩xYt3h⊂λ→0∧4(hP
b∩,2&:∃∧j⊗4X91mβO&;∪π⊗!βOS∂∪Qβ?2β7↔7␈_4(λ→0];K/W'K*↓7↔ny;CW∃[3↔QfS7∞u∩βO?W⊗≠∃lX:s∂	⊂_X∧4Ph(
b$*~&:*αε&018Ymβ∨#π;∪∂∪⊃βO&KQβ}1αε%εc↔SS/⊂4(λ→0];K/W'K*↓3↔"sCW
↑c↔Q3Vk∞u	π≠?WK≡)lX\hP>ε&bλXλh(4(∃B∩⊗~Lr∃α∞≤`X\YZβOSπv#πK⊃π≠SπK"β?→α≥→β3↔'#↔H4P⊂X]w∪↔GWO∪∃↓f+Q;C.∩o3↔"c+7∞j⊃βO?/∪∂∃l184(>≥~1λ→0∧4(hP
b∩,2&:∃∧R_X\3Yβ+W∨#'≠'/→β¬βεKπ∨⊗C 4P⊂
∧λ≡λc+2↓`X\⊂≠∀λ
	0\λ0λ4(4P∪c∪↔6K;∃βo≠≤X\3YβO←O#∂#'v9βS=π##∃βn+OOπ>)β≠'f(4(λ18X\λ6kO≥;o≠≡mEfS7∞uxs@X\⊂_X∧4Ph(c&+≠';*β+;,18Ymβ∨;'S∂FK;≥β&yβS#*β+W;Zβ7↔O≡∨∃β6K3∀4P⊂X\X8⊂≠7O:s7O≡↑S;-3Vk∞u<wX\λ→0∧4(hPc∪.3';∃ε3'0X91mβO>KS∂#Ns≥βSzβS#∃ε3'3∃ε{→β≠Nc↔L4P⊂X\X8⊂≠≠'f+No3/!3+7≥i<;@18λXλh(4(↔C∪↔≠Ns∃β≠NaDX\3YβO←O#∂#'v9βS=π##∃β6K3∃β}1β≠'f+L4(⊃0\X\⊂3≠'3/~o3↔"c+7∞jyG@X8⊂X∧hP4(F#↔≠'v)β∂πa0\Ymπ≠←'S≡C';≥π#=βSF)β∂πf+;∪π∩β≠'3(h(λX90\λ≠≡2mEfS7∞u{C@X\⊂_X∧4Ph(c&+≠';*LX\3YβO←O#∂#'v9βS=π##∃βn+OOπ>)β≠'f(4(λ18λ≠7≡9;7O=YE3+n~u<;↓0\λ0λ4(4P∪c∪↔6K;∃βVs,X\3YβO←O#∂#'v9βS=π##∃βW+;-βn'1β6K3∀4P⊂X\λ6kO≥;o≠≡o+vY3+7≥i<;@18λXλh(4(↔C∪↔≠Ns∃↓⊂18Ymβπ+SS'v9β'9ε9β↔∂+πS'}qβ;Wn∪↔I9ε+c↔∂/#∃β7∞≠K=β∞3S↔Iπ#gC'v9βOgn∪?04P∪%λ4⊂	↓∪%#o/	M∪⊂∂x~HλXλh(4(∃B∩⊗~Lr∃αR
~,X\3YβCW'→βπS&∂!β↔+≠≠↔∩β'9α$
N.Mε3'3∀hPλ≠&O/N[	3+7≥i=KAxs0X\⊂≠∀X8∪ λ0λ4(4P∪c∪↔6K;∃βεC<X\3YβO←O#∂#'v9βS=π##∃βεC?9β6K3∀4P⊂≠CF{:mEfS7∞u{@X\⊂_X∧4Ph(c&+≠';*βπ∪H18Ymβπ+SS'v9β7eε∪∪K/≠Mβ'rβ≠'3(h(X↑π∪?≠↔∨≠?IαV{#9αn~∂πK&CdX↑≡{7CW&+IαO≡K↔;∂*α∪↔C∂∪S7↔w 4(X=≠Sπ;6{K⊃α.s'[↔↔≠'Sd1:OSπv3?K⊃∧≠π3'6x-3Urnia 94305⊗↔αβ⊗↓

αxdefine s81⊗↔⊗; starting a file
α⊗↔αs⊗=αi[s81,jmc]α⊗↔αxpo/c⊗↔αβ⊗↓

αxdefine s83⊗↔⊗; starting a file
α⊗↔αs⊗=αi[s83,jmc]α⊗↔αxpo/c⊗↔αhαcαhαe⊗↔αβ⊗↔αβ⊗↓

αxdefine ekl⊗↔⊗; starting up an ekl
αxsl dsk:ekl.dmp[1,3]⊗↔αxlfile⊗↔αβ⊗↓

αxdefine lisp⊗↔⊗; starting up a lisp
αxsl (lisp)⊗↔αxlpend⊗↔αβ⊗↓

αXDEFINE L⊗↔⊗; Run lisp functions.  Needs lines ;bfun ;efun ;end.
⊗↔αβlαβf;end⊗↔⊗↔αβ9αβ9αβ9αβdαβlαβf;bfun⊗↔αβf;efunα=αβf;end⊗↔αβjαβ⊗↓

αxdefine phil⊗↔⊗; mailing to "phil-sci%oz"%ml mails the rest of the page
α∞αxmail "phil-sci%oz"%ml/su⊗↔αβ⊗↓